home *** CD-ROM | disk | FTP | other *** search
/ Zoo Guides: Life in the Desert / Zoo Guides - Life in the Desert.iso / pc / lfnthdsr / chapters / shared.dir / 00405_Script_405 < prev    next >
Text File  |  1995-05-08  |  797b  |  28 lines

  1. --
  2. on bigvideo
  3. global hh, ww, ht, wt
  4. puppetsprite 15, true
  5.  
  6. if the height of sprite 15 < 360 then
  7.   put the height of sprite 15 into ht
  8.   put the width of sprite 15 into wt
  9.   put the loch of sprite 15 into hh
  10.   put the locv of sprite 15 into ww
  11.   set the loch of sprite 15 to 320
  12.   set the locv of sprite 15 to 192
  13.   set the height of sprite 15 to 384
  14.   set the width of sprite 15 to 496
  15.   updatestage
  16. else
  17.   set the visibility of sprite 15 to 0
  18.   updatestage
  19.   set the height of sprite 15 to 195
  20.   set the width of sprite 15 to wt
  21.    set the loch of sprite 15 to (the loch of sprite 14)
  22.   set the locv of sprite 15 to (the locv of sprite 14)
  23.  
  24.   set the visibility of sprite 15 to 1
  25.   -- set the controller of cast (the castnum of sprite 15) to 1
  26.   updatestage
  27.   
  28. end if